home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 11 / FM Towns Free Software Collection 11.iso / t_os / tool / mmlc / sample / sample1.m2 next >
Encoding:
Text File  |  1995-07-24  |  22.7 KB  |  526 lines

  1. /*
  2.    Be Fine !!  ****************************************
  3.    Composed & arranged & programmed By SHINNOSYKE 1995
  4.   *****************************************************
  5. */
  6.  
  7. .title      Be Fine !!
  8. .copyright  (c)SHINNOSUKE 1995
  9.  
  10.  
  11. .division  480
  12.  
  13. .tempo     138
  14. .signature 4/4
  15.  
  16. .memo      make:SC55 mk 2
  17.  
  18. .begin
  19.  
  20. GmSystem
  21. {
  22.      1[0]=@x[7E7F0901]r2;
  23. }
  24.  
  25. ProgramSet
  26. {
  27.      1[0]=@34 r4 %C   %V127 @C91/64  @C93/0   Q6  V14; /* Bass */
  28.      2[0]=@66 r4 %C   %V100 @C91/80  @C93/110 Q6  V14; /* Melody */
  29.      3[0]=@3  r4 %C   %V100 @C91/80  @C93/110 Q6  V13; /* Melody */
  30.      4[0]=@31 r4 %L16 %V80  @C91/90  @C93/99  Q1  V13; /* Dst.Guiter */
  31.      4[1]=                                    Q1  V13; /* Dst.Guiter */
  32.      5[0]=@01 r4 %R16 %V90  @C91/40  @C93/67  Q6  V12; /* Piano */
  33.      6[0]=@06 r4 %R4  %V90  @C91/40  @C93/60  Q8  V12; /* E.Piano */
  34.      7[0]=@31 r4 %C   %V110 @C91/0   @C93/127 Q8  V14; /* Guiter */
  35.      8[0]=@49 r4 %L4  %V90  @C91/30  @C93/100 Q8  V13; /* String */
  36.     10[0]=@01 r4 %C   %V127 @C91/40  @C93/0   r4     ; /* [RHYTHM] */
  37. }
  38.  
  39. Intro
  40. {
  41.      6[0]=]]L8O4>c4.c4<bag &g2&gega &a4a4g4fe &e1
  42.           d4.e4.f4 a4.g2r8 g.g.g>c.<b.a g1[[r1;
  43.      9[0]=@120r1r1r1r1r1r1r1r1O4Q8r2C2;
  44. }
  45.  
  46. Section_A_1
  47. {
  48.      1[0]=L8O2 cccccccc< bbbbbbbb aaaaaaaa a-a-a-a-a-a-a-a-
  49.           gggggggg  aaaaaaaa ffffffff gggggggg>;
  50.      2[0]=L8O4Q6 >c4.c4<bag &g2&gega &a4a4g4fe &e1
  51.           d4.e4.f4 a4.g2r8 g.g.g>c.<b.a g1;
  52.      3[0]=L8O5Q6 >c4.c4<bag &g2&gega &a4a4g4fe &e1
  53.           d4.e4.f4 a4.g2r8 g.g.g>c.<b.a g1;
  54.      4[0]=L8O3 c,,8ccc,,8cccc,,8  e,,8eee,,8eeee,,8
  55.           f,,8fff,,8ffff,,8  f,,8fff,,8ffff,,8
  56.           e,,8eee,,8eeee,,8  e,,8eee,,8eeee,,8
  57.           f,,8fff,,8ffff,,8  g,,8ggg,,8gggg,,8;
  58.      4[1]=L8O3 g,,8ggg,,8gggg,,8  b,,8bbb,,8bbbb,,8
  59.           >c,,8ccc,,8cccc,,8  c,,8ccc,,8cccc,,8<
  60.           b,,8bbb,,8bbbb,,8 >c,,8ccc,,8cccc,,8
  61.           c,,8ccc,,8cccc,,8  d,,8ddd,,8dddd,,8<;
  62.      5[0]=L4O4 (cccc eeee ffff ffff   eeee eeee ffff gggg
  63.           | eeee gggg aaaa $(a-)4 gggg aaaa aaaa bbbb 
  64.           | gggg bbbb>cccc cccc<  bbbb>cccc cccc dddd<);
  65.      6[0]=L1O4 (ceff eefg  |  egaa- gaab  |  gb>cc< b>ccd<);
  66.     10[0]=L8O2 >c+,110<f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  67.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110a+,90
  68.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  69.           f+,110a+,90f+,110f+,60 f+,110f+,50f+,110f+,60
  70.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  71.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110a+,90
  72.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  73.           f+,110a+,90f+,110f+,60 f+,110f+,50f+,110f+,60;
  74.     10[1]=L8O2 c,100rd,100c,85 c,100rd,100r
  75.           rc,100d,100c,90 c,100rd,100r
  76.           c,100rd,100c,85 c,100rd,100r
  77.           rc,100d,100c,90 c,100rd,100r
  78.           c,100rd,100c,85 c,100rd,100r
  79.           rc,100d,100c,90 c,100rd,100r
  80.           c,100rd,100c,85 c,100rd,100r
  81.           rc,100d,100c,90 rc16,100c16,80d,100d,100;
  82. } // (C Em F Fm -- Em AmonE Dm G)
  83.  
  84. Section_A_2
  85. {
  86.      1[0]=L8O2 cccccccc< bbbbbbbb aaaaaaaa a-a-a-a-a-a-a-a-
  87.           gggggggg  aaaaaaaa ffffffff gggggggg>;
  88.      2[0]=L8O4 >c4.c4<bag &g2&gega &a4a4g4fe &e1
  89.           d4.e4.f4 a4.g2r8 g.g.gg.g.g >d4.c4.<b4;
  90.      3[0]=L8O5 >c4.c4<bag &g2&gega &a4a4g4fe &e1
  91.           d4.e4.f4 a4.g2r8 g.g.gg.g.g >d4.c4.<b4;
  92.      4[0]=L8O3 c,,8ccc,,8cccc,,8  e,,8eee,,8eeee,,8
  93.           f,,8fff,,8ffff,,8  f,,8fff,,8ffff,,8
  94.           e,,8eee,,8eeee,,8  e,,8eee,,8eeee,,8
  95.           f,,8fff,,8ffff,,8  g,,8ggg,,8gggg,,8;
  96.      4[1]=L8O3 g,,8ggg,,8gggg,,8  b,,8bbb,,8bbbb,,8
  97.           >c,,8ccc,,8cccc,,8  c,,8ccc,,8cccc,,8<
  98.           b,,8bbb,,8bbbb,,8 >c,,8ccc,,8cccc,,8
  99.           c,,8ccc,,8cccc,,8  d,,8ddd,,8dddd,,8<;
  100.      5[0]=L4O4 (cccc eeee ffff ffff   eeee eeee ffff gggg
  101.           | eeee gggg aaaa $(a-)4 gggg aaaa aaaa bbbb 
  102.           | gggg bbbb>cccc cccc<  bbbb>cccc cccc dddd<);
  103.      6[0]=L1O4 (ceff eefg  |  egaa- gaab  |  gb>cc< b>ccd<);
  104.     10[0]=L8O2 >c+,110<f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  105.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110a+,90
  106.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  107.           f+,110a+,90f+,110f+,60 f+,110f+,50f+,110f+,60
  108.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  109.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110a+,90
  110.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  111.           f+,110a+,90f+,110f+,60 f+,110f+,50f+,110f+,60;
  112.     10[1]=L8O2 c,100rd,100c,85 c,100rd,100r
  113.           rc,100d,100c,90 c,100rd,100r
  114.           c,100rd,100c,85 c,100rd,100r
  115.           rc,100d,100c,90 c,100rd,100r
  116.           c,100rd,100c,85 c,100rd,100r
  117.           rc,100d,100c,90 c,100rd,100r
  118.           c,100rd,100c,85 c,100rd,100r
  119.           rc,100d,100c,90 rc16,100c16,80d,100d,100;
  120. } // (C Em F Fm -- Em AmonE Dm G)
  121.  
  122. Section_B
  123. {
  124.      1[0]=ffffffff eeeeeeee dddddddd cccccccc
  125.           ffffffff eeeeeeee dddddddd gggggggg;
  126.      2[0]=>c2.cc d.c16rc2r <g2.ab> d.c16rc2r
  127.           c2.cc d.c16rc2r <g2.ab> f4.e4.d4<;
  128.      3[0]=>c2.cc d.c16rc2r <g2.ab> d.c16rc2r
  129.           c2.cc d.c16rc2r <g2.ab> f4.e4.d4<;
  130.      4[0]=f,,8ffffff,,8f,,8  e,,8eeeeee,,8e,,8  
  131.           d,,8dddddd,,8d,,8  c,,8cccccc,,8c,,8
  132.           f,,8ffffff,,8f,,8  e,,8eeeeee,,8e,,8
  133.           d,,8dddddd,,8d,,8  g,,8gggggg,,8g,,8;
  134.      4[1]=>c,,8cccccc,,8c,,8  c,,8cccccc,,8c,,8<
  135.           a,,8aaaaaa,,8a,,8  g,,8gggggg,,8g,,8
  136.           >c,,8cccccc,,8c,,8  c,,8cccccc,,8c,,8<
  137.           a,,8aaaaaa,,8a,,8 >d,,8dddddd,,8d,,8<;
  138.      5[0]=(ffff eeee  dddd cccc  ffff eeee  dddd  gggg
  139.           |aaaa gggg  ffff eeee  aaaa aaaa  ffff  bbbb
  140.           |cccc cccc< aaaa gggg >cccc cccc <aaaa> dddd<);
  141.      6[0]=(fedc fedg | agfe aafb |>cc<ag >cc<a>d<);
  142.     10[0]=L8O2 >c+,110<f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  143.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110a+,90
  144.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  145.           f+,110a+,90f+,110f+,60 f+,110f+,50f+,110f+,60
  146.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  147.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110a+,90
  148.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  149.           f+,110a+,90f+,110f+,60 f+,110f+,50f+,110f+,60;
  150.     10[1]=L8O2 c,100rd,100c,85 c,100rd,100r
  151.           rc,100d,100c,90 c,100rd,100r
  152.           c,100rd,100c,85 c,100rd,100r
  153.           rc,100d,100c,90 c,100rd,100r
  154.           c,100rd,100c,85 c,100rd,100r
  155.           rc,100d,100c,90 c,100rd,100r
  156.           c,100rd,100c,85 c,100rd,100r
  157.           rc,100d,100c,90 rc16,100c16,80d,100d,100;
  158. }//(F ConE Dm C -- F AmonE Dm G)
  159.  
  160. Section_C
  161. {
  162.      1[0]=cccccccc <gggggggg aaaaaaaa ffffffff>
  163.           cccccccc <ffffffff gggggggg gggggggg>
  164.           cccccccc <gggggggg aaaaaaaa ffffffff>
  165.           cccccccc <ffffffff gggggggg gggggggg>;
  166.      2[0]=>c2<g4>c4 d2<g4>d4 e2<a4>e4 grfe4dc4
  167.           eere4efe dd4e4.f4 a.g.fa.g.f g1<
  168.           >c2<g4>c4 d2<g4>d4 e2<a4>e4 grfe4dc4
  169.           eere4efe dd4e4.f4 a.g.fa.g.f g2c4<b4;
  170.      3[0]=>c2<g4>c4 d2<g4>d4 e2<a4>e4 grfe4dc4
  171.           eere4efe dd4e4.f4 a.g.fa.g.f g1<
  172.           >c2<g4>c4 d2<g4>d4 e2<a4>e4 grfe4dc4
  173.           eere4efe dd4e4.f4 a.g.fa.g.f g2c4<b4;
  174.      4[0]=L1 $( g,,8 g,,8 a,,8 f,,8  g,,8 f,,8 g,,8 g,,8 )2;
  175.      4[1]=L1 $(>e,,8 d,,8 e,,8 c,,8  e,,8 c,,8 d,,8 d,,8<)2;
  176.      5[0]=(  gggg  gggg  aaaa  ffff  gggg  ffff  gggg  gggg
  177.           |>cccc< bbbb >cccc< aaaa >cccc< aaaa >cccc< bbbb
  178.           |>eeee  dddd  eeee  cccc  eeee  cccc  dddd  dddd<)
  179.           (  gggg  gggg  aaaa  ffff  gggg  ffff  gggg  gggg
  180.           |>cccc< bbbb >cccc< aaaa >cccc< aaaa >cccc< bbbb
  181.           |>eeee  dddd  eeee  cccc  eeee  cccc  dddd  dddd<);
  182.      6[0]=$((ggaf gfgg | >c<b>c<a >c<a>c<b | >edec ecdd<))2;
  183.     10[0]=L8O2 >c+,110<f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  184.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110a+,90
  185.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  186.           f+,110a+,90f+,110f+,60 f+,110f+,50f+,110f+,60
  187.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  188.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110a+,90
  189.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  190.           f+,110a+,90f+,110f+,60 f+,110f+,50f+,110f+,60
  191.           >c+,110<f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  192.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110a+,90
  193.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  194.           f+,110a+,90f+,110f+,60 f+,110f+,50f+,110f+,60
  195.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  196.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110a+,90
  197.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  198.           f+,110a+,90f+,110f+,60 f+,110f+,50f+,110f+,60;
  199.     10[1]=L8O2 c,100rd,100c,85 c,100rd,100r
  200.           rc,100d,100c,90 c,100rd,100r
  201.           c,100rd,100c,85 c,100rd,100r
  202.           rc,100d,100c,90 c,100rd,100r
  203.           c,100rd,100c,85 c,100rd,100r
  204.           rc,100d,100c,90 c,100rd,100r
  205.           c,100rd,100c,85 c,100rd,100r
  206.           rc,100d,100c,90 rc16,100c16,80d,100d,100
  207.           c,100rd,100c,85 c,100rd,100r
  208.           rc,100d,100c,90 c,100rd,100r
  209.           c,100rd,100c,85 c,100rd,100r
  210.           rc,100d,100c,90 c,100rd,100r
  211.           c,100rd,100c,85 c,100rd,100r
  212.           rc,100d,100c,90 c,100rd,100r
  213.           c,100rd,100c,85 c,100rd,100r
  214.           rc,100d,100c,90 rc16,100c16,80d,100d,100;
  215. } //(C G Am F -- C F Gsus4 G) *2
  216.  
  217. Section_D
  218. {
  219.      1[0]=c1^1;
  220.      2[0]=>c1^1<;
  221.      3[0]=>c1^1<;
  222.      4[0]=(c1^1,,8|g^1,,8|g1^1,,8);
  223.      5[0]=(c1^1|e1^1|g1^1);
  224.      6[0]=(c1^1|e1^1|g1^1);
  225.     10[0]=>c+,110<;
  226.     10[1]=d,110b,100b16,100a,100a16,100
  227.           g16,90g16,90g16,80d16,90d,110r
  228.           d,16d,32d,48d,64d,80d,96d,112d,127;
  229. }
  230.  
  231. Section_E
  232. {
  233.      1[0]=cccccccc <gggggggg aaaaaaaa ffffffff>
  234.           cccccccc <ffffffff gggggggg gggggggg>
  235.           cccccccc <gggggggg aaaaaaaa ffffffff>
  236.           cccccccc <ffffffff gggggggg gggggggg>;
  237.      5[0]=(  gggg  gggg  aaaa  ffff  gggg  ffff  gggg  gggg
  238.           |>cccc< bbbb >cccc< aaaa >cccc< aaaa >cccc< bbbb
  239.           |>eeee  dddd  eeee  cccc  eeee  cccc  dddd  dddd<)
  240.           (  gggg  gggg  aaaa  ffff  gggg  ffff  gggg  gggg
  241.           |>cccc< bbbb >cccc< aaaa >cccc< aaaa >cccc< bbbb
  242.           |>eeee  dddd  eeee  cccc  eeee  cccc  dddd  dddd<);
  243.      6[0]=$((ggaf gfgg | >c<b>c<a >c<a>c<b | >edec ecdd<))2;
  244.      7[0]=L8 >c2<g4>c4 d2<g4>d4 e2<a4>e4 grfe4dc4
  245.           eere4efe dd4e4.f4 a.g.fa.g.f g1<
  246.           >c2<g4>c4 d2<g4>d4 e2<a4>e4 grfe4dc4
  247.           eere4efe $(a.g.f)4 g1<;
  248.     10[0]=L8O2 >c+,110<f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  249.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110a+,90
  250.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  251.           f+,110a+,90f+,110f+,60 f+,110f+,50f+,110f+,60
  252.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  253.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110a+,90
  254.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  255.           f+,110a+,90f+,110f+,60 f+,110f+,50f+,110f+,60
  256.           >c+,110<f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  257.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110a+,90
  258.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  259.           f+,110a+,90f+,110f+,60 f+,110f+,50f+,110f+,60
  260.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  261.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110a+,90
  262.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  263.           f+,110a+,90f+,110f+,60 f+,110f+,50f+,110f+,60;
  264.     10[1]=L8O2 c,100rd,100c,85 c,100rd,100r
  265.           rc,100d,100c,90 c,100rd,100r
  266.           c,100rd,100c,85 c,100rd,100r
  267.           rc,100d,100c,90 c,100rd,100r
  268.           c,100rd,100c,85 c,100rd,100r
  269.           rc,100d,100c,90 c,100rd,100r
  270.           c,100rd,100c,85 c,100rd,100r
  271.           rc,100d,100c,90 rc16,100c16,80d,100d,100
  272.           c,100rd,100c,85 c,100rd,100r
  273.           rc,100d,100c,90 c,100rd,100r
  274.           c,100rd,100c,85 c,100rd,100r
  275.           rc,100d,100c,90 c,100rd,100r
  276.           c,100rd,100c,85 c,100rd,100r
  277.           rc,100d,100c,90 c,100rd,100r
  278.           c,100rd,100c,85 c,100rd,100r
  279.           rc,100d,100c,90 rc16,100c16,80d,100d,100;
  280. } //(C G Am F -- C F Gsus4 G) *2
  281.  
  282. Section_A_1
  283. {
  284.      1[0]=L8O2 cccccccc< bbbbbbbb aaaaaaaa a-a-a-a-a-a-a-a-
  285.           gggggggg  aaaaaaaa ffffffff gggggggg>;
  286.      2[0]=L8O4Q6 >c4.c4<bag &g2&gega &a4a4g4fe &e1
  287.           d4.e4.f4 a4.g2r8 g.g.g>c.<b.a g1;
  288.      3[0]=L8O5Q6 >c4.c4<bag &g2&gega &a4a4g4fe &e1
  289.           d4.e4.f4 a4.g2r8 g.g.g>c.<b.a g1;
  290.      4[0]=L8O3 c,,8ccc,,8cccc,,8  e,,8eee,,8eeee,,8
  291.           f,,8fff,,8ffff,,8  f,,8fff,,8ffff,,8
  292.           e,,8eee,,8eeee,,8  e,,8eee,,8eeee,,8
  293.           f,,8fff,,8ffff,,8  g,,8ggg,,8gggg,,8;
  294.      4[1]=L8O3 g,,8ggg,,8gggg,,8  b,,8bbb,,8bbbb,,8
  295.           >c,,8ccc,,8cccc,,8  c,,8ccc,,8cccc,,8<
  296.           b,,8bbb,,8bbbb,,8 >c,,8ccc,,8cccc,,8
  297.           c,,8ccc,,8cccc,,8  d,,8ddd,,8dddd,,8<;
  298.      5[0]=L4O4 (cccc eeee ffff ffff   eeee eeee ffff gggg
  299.           | eeee gggg aaaa $(a-)4 gggg aaaa aaaa bbbb 
  300.           | gggg bbbb>cccc cccc<  bbbb>cccc cccc dddd<);
  301.      6[0]=L1O4 (ceff eefg  |  egaa- gaab  |  gb>cc< b>ccd<);
  302.     10[0]=L8O2 >c+,110<f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  303.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110a+,90
  304.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  305.           f+,110a+,90f+,110f+,60 f+,110f+,50f+,110f+,60
  306.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  307.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110a+,90
  308.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  309.           f+,110a+,90f+,110f+,60 f+,110f+,50f+,110f+,60;
  310.     10[1]=L8O2 c,100rd,100c,85 c,100rd,100r
  311.           rc,100d,100c,90 c,100rd,100r
  312.           c,100rd,100c,85 c,100rd,100r
  313.           rc,100d,100c,90 c,100rd,100r
  314.           c,100rd,100c,85 c,100rd,100r
  315.           rc,100d,100c,90 c,100rd,100r
  316.           c,100rd,100c,85 c,100rd,100r
  317.           rc,100d,100c,90 rc16,100c16,80d,100d,100;
  318. } // (C Em F Fm -- Em AmonE Dm G)
  319.  
  320. Section_A_2
  321. {
  322.      1[0]=L8O2 cccccccc< bbbbbbbb aaaaaaaa a-a-a-a-a-a-a-a-
  323.           gggggggg  aaaaaaaa ffffffff gggggggg>;
  324.      2[0]=L8O4 >c4.c4<bag &g2&gega &a4a4g4fe &e1
  325.           d4.e4.f4 a4.g2r8 g.g.gg.g.g >d4.c4.<b4;
  326.      3[0]=L8O5 >c4.c4<bag &g2&gega &a4a4g4fe &e1
  327.           d4.e4.f4 a4.g2r8 g.g.gg.g.g >d4.c4.<b4;
  328.      4[0]=L8O3 c,,8ccc,,8cccc,,8  e,,8eee,,8eeee,,8
  329.           f,,8fff,,8ffff,,8  f,,8fff,,8ffff,,8
  330.           e,,8eee,,8eeee,,8  e,,8eee,,8eeee,,8
  331.           f,,8fff,,8ffff,,8  g,,8ggg,,8gggg,,8;
  332.      4[1]=L8O3 g,,8ggg,,8gggg,,8  b,,8bbb,,8bbbb,,8
  333.           >c,,8ccc,,8cccc,,8  c,,8ccc,,8cccc,,8<
  334.           b,,8bbb,,8bbbb,,8 >c,,8ccc,,8cccc,,8
  335.           c,,8ccc,,8cccc,,8  d,,8ddd,,8dddd,,8<;
  336.      5[0]=L4O4 (cccc eeee ffff ffff   eeee eeee ffff gggg
  337.           | eeee gggg aaaa $(a-)4 gggg aaaa aaaa bbbb 
  338.           | gggg bbbb>cccc cccc<  bbbb>cccc cccc dddd<);
  339.      6[0]=L1O4 (ceff eefg  |  egaa- gaab  |  gb>cc< b>ccd<);
  340.     10[0]=L8O2 >c+,110<f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  341.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110a+,90
  342.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  343.           f+,110a+,90f+,110f+,60 f+,110f+,50f+,110f+,60
  344.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  345.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110a+,90
  346.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  347.           f+,110a+,90f+,110f+,60 f+,110f+,50f+,110f+,60;
  348.     10[1]=L8O2 c,100rd,100c,85 c,100rd,100r
  349.           rc,100d,100c,90 c,100rd,100r
  350.           c,100rd,100c,85 c,100rd,100r
  351.           rc,100d,100c,90 c,100rd,100r
  352.           c,100rd,100c,85 c,100rd,100r
  353.           rc,100d,100c,90 c,100rd,100r
  354.           c,100rd,100c,85 c,100rd,100r
  355.           rc,100d,100c,90 rc16,100c16,80d,100d,100;
  356. } // (C Em F Fm -- Em AmonE Dm G)
  357.  
  358. Section_B
  359. {
  360.      1[0]=ffffffff eeeeeeee dddddddd cccccccc
  361.           ffffffff eeeeeeee dddddddd gggggggg;
  362.      2[0]=>c2.cc d.c16rc2r <g2.ab> d.c16rc2r
  363.           c2.cc d.c16rc2r <g2.ab> f4.e4.d4<;
  364.      3[0]=>c2.cc d.c16rc2r <g2.ab> d.c16rc2r
  365.           c2.cc d.c16rc2r <g2.ab> f4.e4.d4<;
  366.      4[0]=f,,8ffffff,,8f,,8  e,,8eeeeee,,8e,,8  
  367.           d,,8dddddd,,8d,,8  c,,8cccccc,,8c,,8
  368.           f,,8ffffff,,8f,,8  e,,8eeeeee,,8e,,8
  369.           d,,8dddddd,,8d,,8  g,,8gggggg,,8g,,8;
  370.      4[1]=>c,,8cccccc,,8c,,8  c,,8cccccc,,8c,,8<
  371.           a,,8aaaaaa,,8a,,8  g,,8gggggg,,8g,,8
  372.           >c,,8cccccc,,8c,,8  c,,8cccccc,,8c,,8<
  373.           a,,8aaaaaa,,8a,,8 >d,,8dddddd,,8d,,8<;
  374.      5[0]=(ffff eeee  dddd cccc  ffff eeee  dddd  gggg
  375.           |aaaa gggg  ffff eeee  aaaa aaaa  ffff  bbbb
  376.           |cccc cccc< aaaa gggg >cccc cccc <aaaa> dddd<);
  377.      6[0]=(fedc fedg | agfe aafb |>cc<ag >cc<a>d<);
  378.      10[0]=L8O2 >c+,110<f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  379.            f+,110f+,50f+,110f+,60 f+,110f+,50f+,110a+,90
  380.            f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  381.            f+,110a+,90f+,110f+,60 f+,110f+,50f+,110f+,60
  382.            f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  383.            f+,110f+,50f+,110f+,60 f+,110f+,50f+,110a+,90
  384.            f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  385.            f+,110a+,90f+,110f+,60 f+,110f+,50f+,110f+,60;
  386.      10[1]=L8O2 c,100rd,100c,85 c,100rd,100r
  387.            rc,100d,100c,90 c,100rd,100r
  388.            c,100rd,100c,85 c,100rd,100r
  389.            rc,100d,100c,90 c,100rd,100r
  390.            c,100rd,100c,85 c,100rd,100r
  391.            rc,100d,100c,90 c,100rd,100r
  392.            c,100rd,100c,85 c,100rd,100r
  393.            rc,100d,100c,90 rc16,100c16,80d,100d,100;
  394. }//(F ConE Dm C -- F AmonE Dm G)
  395.  
  396. Section_C
  397. {
  398.      1[0]=cccccccc <gggggggg aaaaaaaa ffffffff>
  399.           cccccccc <ffffffff gggggggg gggggggg>
  400.           cccccccc <gggggggg aaaaaaaa ffffffff>
  401.           cccccccc <ffffffff gggggggg gggggggg>;
  402.      2[0]=>c2<g4>c4 d2<g4>d4 e2<a4>e4 grfe4dc4
  403.           eere4efe dd4e4.f4 a.g.fa.g.f g1<
  404.           >c2<g4>c4 d2<g4>d4 e2<a4>e4 grfe4dc4
  405.           eere4efe dd4e4.f4 a.g.fa.g.f g2c4<b4;
  406.      3[0]=>c2<g4>c4 d2<g4>d4 e2<a4>e4 grfe4dc4
  407.           eere4efe dd4e4.f4 a.g.fa.g.f g1<
  408.           >c2<g4>c4 d2<g4>d4 e2<a4>e4 grfe4dc4
  409.           eere4efe dd4e4.f4 a.g.fa.g.f g2c4<b4;
  410.      4[0]=L1 $( g,,8 g,,8 a,,8 f,,8  g,,8 f,,8 g,,8 g,,8 )2;
  411.      4[1]=L1 $(>e,,8 d,,8 e,,8 c,,8  e,,8 c,,8 d,,8 d,,8<)2;
  412.      5[0]=(  gggg  gggg  aaaa  ffff  gggg  ffff  gggg  gggg
  413.           |>cccc< bbbb >cccc< aaaa >cccc< aaaa >cccc< bbbb
  414.           |>eeee  dddd  eeee  cccc  eeee  cccc  dddd  dddd<)
  415.           (  gggg  gggg  aaaa  ffff  gggg  ffff  gggg  gggg
  416.           |>cccc< bbbb >cccc< aaaa >cccc< aaaa >cccc< bbbb
  417.           |>eeee  dddd  eeee  cccc  eeee  cccc  dddd  dddd<);
  418.      6[0]=$((ggaf gfgg | >c<b>c<a >c<a>c<b | >edec ecdd<))2;
  419.     10[0]=L8O2 >c+,110<f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  420.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110a+,90
  421.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  422.           f+,110a+,90f+,110f+,60 f+,110f+,50f+,110f+,60
  423.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  424.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110a+,90
  425.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  426.           f+,110a+,90f+,110f+,60 f+,110f+,50f+,110f+,60
  427.           >c+,110<f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  428.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110a+,90
  429.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  430.           f+,110a+,90f+,110f+,60 f+,110f+,50f+,110f+,60
  431.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  432.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110a+,90
  433.           f+,110f+,50f+,110f+,60 f+,110f+,50f+,110f+,60
  434.           f+,110a+,90f+,110f+,60 f+,110f+,50f+,110f+,60;
  435.     10[1]=L8O2 c,100rd,100c,85 c,100rd,100r
  436.           rc,100d,100c,90 c,100rd,100r
  437.           c,100rd,100c,85 c,100rd,100r
  438.           rc,100d,100c,90 c,100rd,100r
  439.           c,100rd,100c,85 c,100rd,100r
  440.           rc,100d,100c,90 c,100rd,100r
  441.           c,100rd,100c,85 c,100rd,100r
  442.           rc,100d,100c,90 rc16,100c16,80d,100d,100
  443.           c,100rd,100c,85 c,100rd,100r
  444.           rc,100d,100c,90 c,100rd,100r
  445.           c,100rd,100c,85 c,100rd,100r
  446.           rc,100d,100c,90 c,100rd,100r
  447.           c,100rd,100c,85 c,100rd,100r
  448.           rc,100d,100c,90 c,100rd,100r
  449.           c,100rd,100c,85 c,100rd,100r
  450.           rc,100d,100c,90 rc16,100c16,80d,100d,100;
  451. } //(C G Am F -- C F Gsus4 G) *2
  452.  
  453. Section_A'_1
  454. {
  455.      2[0]=L8O4Q6 >c4.c4<bag &g2&gega &a4a4g4fe &e1
  456.           d4.e4.f4 a4.g2r8 g.g.g>c.<b.a g1;
  457.      3[0]=L8O5Q6 >c4.c4<bag &g2&gega &a4a4g4fe &e1
  458.           d4.e4.f4 a4.g2r8 g.g.g>c.<b.a g1;
  459.      4[0]=L8O3 c,,8ccc,,8cccc,,8  e,,8eee,,8eeee,,8
  460.           f,,8fff,,8ffff,,8  f,,8fff,,8ffff,,8
  461.           e,,8eee,,8eeee,,8  e,,8eee,,8eeee,,8
  462.           f,,8fff,,8ffff,,8  g,,8ggg,,8gggg,,8;
  463.      4[1]=L8O3 g,,8ggg,,8gggg,,8  b,,8bbb,,8bbbb,,8
  464.           >c,,8ccc,,8cccc,,8  c,,8ccc,,8cccc,,8<
  465.           b,,8bbb,,8bbbb,,8 >c,,8ccc,,8cccc,,8
  466.           c,,8ccc,,8cccc,,8  d,,8ddd,,8dddd,,8<;
  467.      5[0]=L4O4 (cccc eeee ffff ffff   eeee eeee ffff gggg
  468.           | eeee gggg aaaa $(a-)4 gggg aaaa aaaa bbbb 
  469.           | gggg bbbb>cccc cccc<  bbbb>cccc cccc dddd<);
  470.      6[0]=L1O4 (ceff eefg  |  egaa- gaab  |  gb>cc< b>ccd<);
  471.      8[0]=O5L1 (g1^1 f1^1 e1^1 d1^1|<g1^1 f1^1 e1^1 d1^1>);
  472. } // (C Em F Fm -- Em AmonE Dm G)
  473.  
  474. Section_A'_2
  475. {
  476.      2[0]=L8O4 >c4.c4<bag &g2&gega &a4a4g4fe &e1
  477.           d4.e4.f4 a4.g2r8 g.g.gg.g.g >d4.c4.<b4;
  478.      3[0]=L8O5 >c4.c4<bag &g2&gega &a4a4g4fe &e1
  479.           d4.e4.f4 a4.g2r8 g.g.gg.g.g >d4.c4.<b4;
  480.      4[0]=L8O3 c,,8ccc,,8cccc,,8  e,,8eee,,8eeee,,8
  481.           f,,8fff,,8ffff,,8  f,,8fff,,8ffff,,8
  482.           e,,8eee,,8eeee,,8  e,,8eee,,8eeee,,8
  483.           f,,8fff,,8ffff,,8  g,,8ggg,,8gggg,,8;
  484.      4[1]=L8O3 g,,8ggg,,8gggg,,8  b,,8bbb,,8bbbb,,8
  485.           >c,,8ccc,,8cccc,,8  c,,8ccc,,8cccc,,8<
  486.           b,,8bbb,,8bbbb,,8 >c,,8ccc,,8cccc,,8
  487.           c,,8ccc,,8cccc,,8  d,,8ddd,,8dddd,,8<;
  488.      5[0]=L4O4 (cccc eeee ffff ffff   eeee eeee ffff gggg
  489.           | eeee gggg aaaa $(a-)4 gggg aaaa aaaa bbbb 
  490.           | gggg bbbb>cccc cccc<  bbbb>cccc cccc dddd<);
  491.      6[0]=L1O4 (ceff eefg  |  egaa- gaab  |  gb>cc< b>ccd<);
  492.      8[0]=O5L1 (g1^1 f1^1 e1^1 d1^1|<g1^1 f1^1 e1^1 d1^1>);
  493. } // (C Em F Fm -- Em AmonE Dm G)
  494.  
  495. Section_B'
  496. {
  497.      2[0]=>c2.cc d.c16rc2r <g2.ab> d.c16rc2r
  498.           c2.cc d.c16rc2r <g2.ab> f4.e4.d4<;
  499.      3[0]=>c2.cc d.c16rc2r <g2.ab> d.c16rc2r
  500.           c2.cc d.c16rc2r <g2.ab> f4.e4.d4<;
  501.      4[0]=f,,8ffffff,,8f,,8  e,,8eeeeee,,8e,,8  
  502.           d,,8dddddd,,8d,,8  c,,8cccccc,,8c,,8
  503.           f,,8ffffff,,8f,,8  e,,8eeeeee,,8e,,8
  504.           d,,8dddddd,,8d,,8  g,,8gggggg,,8g,,8;
  505.      4[1]=>c,,8cccccc,,8c,,8  c,,8cccccc,,8c,,8<
  506.           a,,8aaaaaa,,8a,,8  g,,8gggggg,,8g,,8
  507.           >c,,8cccccc,,8c,,8  c,,8cccccc,,8c,,8<
  508.           a,,8aaaaaa,,8a,,8 >d,,8dddddd,,8d,,8<;
  509.      5[0]=(ffff eeee  dddd cccc  ffff eeee  dddd  gggg
  510.           |aaaa gggg  ffff eeee  aaaa aaaa  ffff  bbbb
  511.           |cccc cccc< aaaa gggg >cccc cccc <aaaa> dddd<);
  512.      6[0]=(fedc fedg | agfe aafb |>cc<ag >cc<a>d<);
  513.      8[0]=(c1^1 <a1> c1^1^1 d1^1 | <c1^1 <a1> c1^1^1 d1^1>);
  514. }//(F ConE Dm C -- F AmonE Dm G)
  515.  
  516. Section F()
  517. {
  518.      2[0]=>c1^1<;
  519.      3[0]=O4 r8c8e8g8>c1;
  520.      4[0]=(c1^1,,8|g1^1,,8);
  521.      5[0]=(c1^1|g1^1|g1^1);
  522.      6[0]=(c1^1|e1^1|g1^1);
  523.      8[0]=(e1^1|<e1^1>);
  524.     16[0]=$(T-3r8)16;
  525. }
  526.